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9 MODULE MOMDAT (IDENT = ‘V04-000") = 
BEGIN 
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| 
' * e 
ie COPYRIGHT («) 1978, 1980, 1982, 1984 B * 
ie DIGITAL EQUIPMENT CORPORATION, ° MAYNARD. MASSACHUSETTS. ® | 
is ALL RIGHTS RESERVED. . 
® 
ie THIS SOFTWARE 1S FURNISHED UNDER A LICENSE AND may CBE USED AND COPIED | 
i® ONLY IN ACCORDANCE WITH THE TERMS OF SUCH WITH THE * | 
is INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS sof td ARE on MANY OTHER: 
ie COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
i® OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
ie TRANSFERRED. . 
® 
wy 
® 
® 
® 
® 
® 
® 
® 
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:* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
:* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
!# CORPORATION. 

ITY FOR THE USE OR RELIABILITY OF ITS 


ie DIGITAL ASSUMES NO RESPONSIBILITY 
1S NOT SUPPLIED BY DIGITAL. 
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4 ! FACILITY: DECnet-VAX Network Maintenanc Operations Module 
0 

80 ABSTRACT: 

00 This module contains all gene? fe Sete referenced by the 
0035 Maintenance Operations Module ( 

Boas ENVIRONMENT: VAX/VMS Operating System 

Bg AUTHOR: Kathy Perko 


CREATION DATE: 17-Dec-1982 
MODIFIED BY: 
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; 7 
8 
9 
4 
4 § v03-004 ar at erko et yuly= 1984 
4 4 MOMSK _MAX mop. *nS LEN instead of Literals in descriptors. 
4 5 This fallS out as part of fix for LOOP CIRC on point-to-point 
$$ § Lines. 
48 8 ¥03-003 MKP0003 Kachy Perko 20-May-1984 
49 Add QNA device to table used to construct secangery and 
0 50 tertiary load file names which are not suppied in the node | 
1 51 database. 
4 3§ v03-002 mKP0002 Kathy Perko 11-April-1984 | 
3 $2 Add buffer for Network eee version checking. 
$ 56 v03-001 MKP0001 Kath 1 fe 20-Jan-1984 
5 005 Add SERVICE NODE VER 10N. Mee, 
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-000 
; ZSBTTL ‘Global data declarations’ | 
4 ' 
; } j INCLUDE FILES: | 
; Pp 
3 6 1 LIBRARY ‘LIBS: 32° 
3 o8 1 LIBRARY art ibs: nna 18h RY. “L32"; 
3 § 1 LIBRARY HL IBS Ne Uae Td 
: £9 } LIBRARY ‘SYS IBRARY : TARLET. L32'; 
3 i i PSECT GLOBAL = SGLOBALS; 
; ? 1! 
3; 77 1 ! OWN STORAGE: 
g rg 1! 
me. 1 GLOBAL 
3 4 1 MOM$GQ_PROPRVMSK : BBLOCK (8), ! Process privilege mask 
3 ; MOMSGW"ACP_CHAN; ! ACP control channel 
; 81 1! 
; § 1! _ log mask. The bit ~* ah get up at service initialization 
; ;} > ie one the logical cane he resulting ASCII hex number 
H 5 : ; S$ converted to binary to provide - yh Fs mask bit settings. 
; : i The values for MOMSLOG are defined as follows: 
; HH 1! 1 NICE message network 1/0. 
3 9 1! 4 WNPARSE state transitions. 
3 1! Test (node loopback) message network 1/0. 
3 1 1! 1 Volatile data base 1/0 (NETACP QI0s). 
3 4 1! MOP direct Line 1/0. 
. § 1! 40 Trace service operation. 
3 Be ' 80 Raw event data. 
; % 1 GLOBAL 
; LA : MOMSGL_LOGMASK : BLOCK [1] INITIAL (0); ! Internal Logging mask 
; 99 1 


en SSS... -——- 
reo a 
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F SBTTL "Data for service operations’ 


The following data is used to store information needed for maintenance 


z 
‘ 
i i 

; operations such as LOAD, DUMP, TRIGGER. and Line Loop. 


i Network device name = used to assign a channel to NETACP for getting 
: information from the volatile database. 
: MOMSGQ_NETNAMDSC = SASCID ('_NET:"), 
i Service device name = used to assign a channel to the device. Q10s to 
! this device will send MOP messages to the target node and receive the 
: response MOP messages. 

MOMSGQ_DLE_NAMDSC = SASCID (*_ND:"), 


' 
! PSI device name - used to assign a channel to PSI for issuing loop 
: Line 10 


SELELRESS 


— —) —) 4s as —) 4 
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MOMSGQ_PSINAMDSC = SASCID ('_NW:'); 


The following fields are used for parsing NICE commands requesting 
service operations. 


L 


OBAL 
MOMSGL_SVD_INDEX, ! Index for parameter's entry in the 
ervice Data Table. 


4 
1 
MOMSGB_FUNCTION: BYTE, i NICE message function code. 
MOMSGB_OPTION_BYTE: BYTE; ! NICE message option byte. 


MEW O OCONOUS WN "OOO yNEM 


The entity string is the data used as the key into the volatile data 
base to get information for the maintenance operation. The contents of the 
buffer are determined by the value of the entity id code. 


ma a mt a a a a ka a a a ed od od 8“ = 
tc a ee ee ee ed ed ed ed od od 
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5 ; 
! NPARSE argument block = this block is used during parsing of NICE messages 
! to keep track of how far into the message the parsing is, and the value and 
: : length of the field currently being parsed. 
40 8 GLOBAL 
rt i} MOMSAB_NPARSE_BLK: SNPA_BLKDEF; 
“§ $ GLOBAL 
rh ‘§ The maintenance entity code can be any one of the following values: 
rh 45 1! MOMSC_LINE 
$8 $8 : MOMSC_CIRCUIT 
s er 
1 4 i 
§ ? MOMSGB_ENTITY_CODE : BYTE, ! Maintenance entity code (key) 
4 
Hi 
; $ 


PAPAIN 


MOMS C~NODEBYNAME 
| 


—————--—— -—---, 
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: MOMSC_LI contains Line name. 

! MOMS “tIREUIT contains circuit name. 
MOMSC NODE 

i 


i 


a contains node address (always a word). 
MOMSC_NODEBYNAME contains node name. 


MOMSAB_ENTITY_BUF =: BBLOCK (32), ! Entity id string buffer 


' 
! The service id descriptor describes the extent of the entity id in 
H the service id buffer. 


MOMSGQ_ENTITY_BUF_DSC : VECTOR fe] ! Maintenance id descriptor 
INITIAL (0, MOMSAB_ENTITY_BUF); 


FERIS Sos 


o 
uw 


Service flags. These flags are set to indicate various options in 
yee by 55° current service operation. The options bits are described 


LOBAL 
POMSGL_SERVICE_FLAGS; 


For autoservice functions, MOM logs events to indicate the status 

of the operation. This serves the same function as the NICE response 

message for operator service functions. The event to logged is kept 
the following fields, and when completion (successful or not) is 


Nm dk a td 2 a ot a 8 
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' 
i 
i 
; 
! in 
; : signalled, the event is logged by the condition handler. 
; ; Three different events can be logged: 
1 i Automatic Line service 0.3 
1 : Aborted service request 0.7 
13 : Passive loopback 0.6 
198 GLOBAL 
19 91 MOMSGB_EVT_POPR : BYTE, ! Passive loopback operation code 
194 4 MOMSGB_EVT_PRSN : BYTE, ! Aborted service request reason code 
195 9 MOM$GB_EVT_PSER : BYTE, ! Automatic Line service request code 
138 94 MOMSGW_EVT_CODE : WORD; ! Event code 
19 95 
198 0196 


SS 
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3 1 7 1 eRe EAAAAAREAEAAAAAAAEAAAAAEEEAERAEAAAAE TEETER AAEAEAEAAERTARAAKAARAEHe 
; 1 1! Buffers for communicating with other components of DECnet: 
3 § 1 1! NICE message buffers 
; 1: age buffers 
; 1! ETACP Q10 buffers 
3 5 § } SPOR R eee ERR A AAA EAAAAAAEAAAAA LEAH AAA AAA ETAT EEAAAAAEATAAAAAKAREAAAAAEES 
; hi! 
; oF 5 1 ! Network 1/0 buffers used for sending and receiving NICE messages from H 
: 4 ; NCP via the Network Management Listener (NML). : 
: 21 1 GLOBAL LITERAL ; 
; \¢ H ; MOMSK_NML_MBX_BUF_LEN = MOMSK_NICE_BUF_LEN + 3; ; 
: 214 1 1 GLOBAL ; 
; 15 § 1 MOMSAB_NML_MAILBOX_BUFFER: BBLOCK CMOMSK_NML_MBX_BUF _LENJ; : 
: 216 1 GLOBAL BIND 3 
; 17 4 1 MOMSAB_NCP_VERSION = MOMSAB_NML_MAILBOX BUFFER : BBLOCK (3), 
: 218 8 29 MOMSAB_NICE_RCV_BUF = MOMSAB_NMC_MAILBOR BUFFER + 3 : 
: 219 § 1 BBLOCK CMOMSK_NICE_BUF_LENJ; 
; 0 0 1 GLOBAL 
; 1 8 8 1 MOMSGL_NICE_RCV_MSG_LEN, 3 
; ¢ b63? : MOMSAB_NICE_XMIT_BUF:BBLOCK CMOMSK_NICE_BUF_LEN); : 
> 226 0221 1 GLOBAL BIND : 
: 5 0 ; 1 MOMSGQ_NICE_RCV_BUF_DSC = : 
3 $ § 1 UPCIT (AMOMSR_NICE BUF_LEN, MOMSAB_NICE_RCV_BUF), 3 
H 4 1 MOMSGQ_NICE_XMIT_BUF BSC = : 
: . 03 ‘ : UPCIT (AMOMSK_NICE_BUF_LEN, MOMSAB_NICE_XMIT_BUF); : 
; 0 1! : 
; 231 0228 1 ! P4 Q10 buffer used to get the target's service parameters from NETACPs 
; $8 0 i! } volatile database. NETACP returns the parameters in this buffer. 
; 34 1 1 GLOBAL 
3; 235 0 ¢ 1 MOMSAB_ACPQJ0_BUFFER: BBLOCK CMOMSK_Q10_BUF_LEN]; 
3 1 GLOBAL BIND 
; 7 1 MOM$GQ_ACPQIO BUF _DSC = : 
: 39 5 } UPCIT (MOMSK_G10_BUF_LEN, MOMSAB_ACPQIO_BUFFER); . 
: 240 $539 ; 
: 261 0238 1! H 
3 “g 0 ip } MOP 1/0 Channel Information Blocks (CIBs), buffers, and descriptors. : 
: 264 6 41 1 GLOBAL ; 
3 245 ri} 1 MOMSGQ_TIMEOUT: VECTOR ce} ! Timer set on all MOP Q10s : 
: 246 0245 1 cate ag (0, -1), ! to target (delta). 3 
3 247 44 1 MOMSAB_CIB : BBLOCK cree CIBLEN) 3 
; 48 45 MOMSAB-LOOP_CIB : BBLOCK CCIBSC_CIBLEN); : 
; 250 47 1 GLOBAL BIND : 
; 2) 2 ' MOMSAB_TRIGGER_CIB = MOMSAB_LOOP_CIB : BBLOCK; 
i $28 50 1 GLOBAL 7 | 
; 254 [7 MOMSAB_MOP_XMIT_BUF: BBLOCK [MOMSK_MAX_MOP_MSG_LEN], ! Transmit. buffer | 
» oe $26 1 MOMSAB_-MOP-RCV_BUF : BBLOCK CMOMSK-MAX-MOP_MSG_LEN], ! Receive buffer 
3 256 53 1 MOMSAB_MOP—MSG : BBLOCK CMOMSK"MAX"MOP"MSG-LENJ, ! Received MOP | 

| 


YOe-000 Data for service operations Ie: 500-1944 95:04:38 biek VMSHAS ERSCHOM SRC MOMDAT .B32;1 tose «as 
MOMSGQ_MOP_MSG_DSC : VECTOR (2); Received TR acesoes’ descriptor. 


GLOBAL 
mOMSGO. MOP _XMIT_BUF _D 


6 SC 
eg UPLIT (nonst ~MAX_MOP_MSG_LEN, MOMSAB_MOP_XMIT_BUF ) 
VECTOR C2], 
MOM$GQ_MOP_RCV_BUF _DSC = 
65 UPLIT_ (MOMSK_MAX_MOP_MSG_LEN, MOMSAB_MOP_RCV_BUF ) 
: VECTOR (2); 


to be put into the NICE a onse message returned to N 
! MOMSBLD_REPLY is called with this block as input. MOM$BLD REPLY 
then constructs the response message. 


GLOBAL 
MOMSAB_MSGBLOCK <:BBLOCK CMSBSK_LENGTH); 


4s 2 = 2 2 ) ts 


NO 
So 
VISSRISALERIS Soros 


SRUSALERIS SS 


NN 
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The Be structure is used for accumulating the pazoraetion 
) 

} 

| 
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command, any porenevere specified there overwrite the ones from the 
volatile database. These parameters are then used to perform the 


requested service function. 


44 8 1 TEEPE Sethe SSS SSE SSS SSS SSH SE SESH SHES ese Hh EEE HEHE E44 444 4444444444444444444444 
8 8 Service Data Table 
rs For any MOP maintenance operation, certain node and circuit 
8 : volatile database saved in this table. Then, if there is a NICE 
0 


] 
| 
parameters are need. These parameters are retrieved from the | 
| 
Each parameter's entry in the Service Data Table contains the following | 
information: 


SVDSL_NFB_ID - at ee ID (used to identify the parameter to 


SVDSW_NICE_ID = The NICE parameter ID (used to identify the parameter 
n_ the command from NCP). 

SVDSB_NICE_TYPE = The pereneser 5 type (byte, word, longword, or 
string in the NICE moeeene. 

SVD$B_FLAGS - There's only one flag, SVDSM_MSG_PARAM, which is set 
if the poreteset value in this entry was obtained from 
the NICE or MOP message specifying parameters for the 
current operation. 

SDV$B_STRING_LEN = Byte Length of the parameter if it's a string. 
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1 
1 
1 
1 
1 
1 
1 
1 
1 
0 1 
8 1 
1 
0 1 
0 1 
0 1 
0 1 
0 1 
0 1 
0 1 
0 1 
0 1 
99 0 1 
00 0 1 SDVSL_PARAM = The parameter value. 
01 0297 1 SVDST_STRING = The string. 
4 0298 1 
0 0 99 1 | eemmewoooooonne eeeeeeeeeoeeeoesoeeeeeeeeesseeseeseeeeooeeeoececoecoecocoa 
04 0300 1 
$0? 0301 1! 
309 6306 : : Macro to generate an entry for a parameter in the Service Data Table. 
$05 e Behe : MACRO SERVICE_TAB (ENTITY) CPARAM_ID, NFB_DATABASE, PARAM_TYPE] = 
310 m 0306 1 CSVD_INDEX, SVDSL_NFB_ID) = 
31 m 0307 1 ZTF ZARULL (NFB_DATABASE) 
\¢ m 0308 1 ZTHEN 
aE : sie4 : ZELSE ZNAME ("NFBSC_',NFB_DATABASE,'_*,PARAM_ID) 
31 m 0311 1 pave _fteer. SvD$W_NICE_1D) = ZNAME ("NMASC_‘,ENTITY,'_*,PARAM_ID), 
16 nag ! SVD_INDEX, SVDSB_NICE_TYPE] = ZNAME ('SVDSK_*, PARAM_TYPE) 
18 M Sate 1 ZASSIGN (SVD_INDEX, SVD_INDEX+1) 
26 "Ose x 
fe 
§ B35 1! 
$2 $35 : : Generate the Service Data Table indices used by the NPARSE tables. 
35 2 : 1 : MACRO SVD_INDEX_GEN (ENTITY) CPARAM_ID, NFB_DATABASE, PARAM_TYPE] = 
$$ i] 3 : 1 GLOBAL LITERAL 
28 i 4 1 ZNAME ("SVD$GK_*,ENTITY,*_*,PARAM_ID) = SVD_INDEX; 
9 " 5 ZASSIGN (SVD_INDEX, $VD_INDEX#15 | 
1 ; : i; | 
3§ } § 1 COMPILETIME | 
| 
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1 SVD_INDEX = 0; 


“ 


Some of the entries in the Service Data table do not have convenient entries 
in the volatile database or in the NICE protocol. They are useful pieces of 


WWWAWAAAAAAWAAIW 


| 
° 0 | ; 
: : s | . 
; 1 : 
; : ,? ° 
: 4 1! ; 
i 335 0335 1 | ; 
; 340 $ 1 ! information to keep around during the maintenance operation. So pseudo . 
3; 3541 ‘ ! : names are used for their entries in the SVD. e 
: rk 9 1! The values all have bit 15 set, indicating a counter value, to avoid ‘ 
; re} 0 re 1 conflicts with other network management parameter codes. : 
: 346 4g | GLOBAL LITERAL : 
3; 347 0345 1 NMASC_PCNO_SHNA = 1 * 15 OR O, ! Host node name : 
; 48 9 4b NMASC"PCNO-SFTY = 1 * 14 OR O, t Load file type (operating system : 
; : or n ° ‘ 
; 390 O46 1 NMASC_PCNO_SHHW = 1 * 13 OR O, ' NI Hardware Sadress from volatile ‘ 
3 r tot : } | eee used for loop circuit | ‘ 
3 ! mman ‘ 
; 2 $309 1 NMASC_PCNO_SLNA = 1 * 12 OR O, ' Loop circuit node name. ‘ 
; 354 0350 1 NMASC_PCNO_SLNH = 1 “ 11 OR O, ' Loop circuit node hardware address. ° 
3 399 0351 1 NMASC_PCNO_SLNN = 1 * 10 OR O, ' Loop circuit assistant node name. | ‘ 
; $29 8 26 : NMASC_PCNO_$LAH = 1 * 9 OR O, : Loop circuit assistant node hardware : 
3 ' address. ‘ 
: 358 0354 1 NMASC_PCNO_SDA = 1 * 8 OR 0; ! Destination Address on MOP message | ‘ 
3 2 B822 ’ ! initiating an autoservice function. ‘ 
: 361 ae | ; 
; 2 M0358 1 MACRO NDI_SERVICE_DATA = ; 
; M B88 1! ; 
: 364 m™ 0360 1! NFB ‘ 
3 365 2 0361 : Param ID Database Param type ; ‘ 
: 367 " $368 .. ADD, NDI, WORD, ! Target's node address : 
; 368 M0364 1 SDV, NDI, BYTE, ' Service device type J, ‘ 
3; 36 m 0365 1 CPU, NDI, BYTE, ! Target's CPU type ‘ 
2 i Bee 1 STY, NDI, BYTE, ! Software type to start load with ; 
3 M0367 1 DAD, NDI, LONG, ! Address to start dump from ; 
; » tre 1 DCT, NDI, LONG, ' Dump byte count ; 
3 m 0369 1 IHO, NDI, WORD, : Host node address 
3 m 0370 1 ‘ NDI, STRING, ! Target's node name 
3 Ol ya 1 SLI, ND!, STRING, ! Service circuit ID 
; m0 i 1 SPA, NDI, STRING, ' Service password 
3 ial O37 1 HWA, NDI, STRING, ' NI hardware address 
: uss | (Ok: BL: Static, LaudPfate'tpvscr ode verston | 
; e e ra ” oa e 
: m0 6 1 SLO, NDI, STRING, ! Secondary loader file ID 
3 m 0377 1 TLO, NDI, STRING, ' Tertiary loader file ID | 
: 0 a 
; N 0380 1 DUM, NDI, STRING, i Dump file ID | 
3 ial Ee SDU NDI, STRING, ' Secondary dump file ID 
: s : 1 SHNA, , STRING, i Host node name 
3 " 1 $HHW, , STRING, ! Host NI hardware address 
; i 1 SFY,  «¢ BYTE, Load file type (Operating system or 
; mM HH 1 diagnostics). 
g i 6 1 PHA, . STRING, ! Physical address (from NICE command or 
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Data for service operations 


$DA, ° STRING, 
LPC, LNI, WORD, 
LPL, LNI, WORD, 
LPD, LNI, BYTE, 
LPH, LNI, BYTE, 
LPA, . TRING, 
PN, . WORD, 
LNA, , STRING, 
SLNH, , STRING, 
LAN, . WORD, 
$SLNN, , STRING, 
$LAH, , STRING 
i, 


PLI_SERVICE_DATA = 


NFB 
Param ID Database Param type 


err rr ee 


! Line 


Sep-1 1: VAX-11 AM s-32 V 
“520-198 TH ee Se 
NI header). 
| Destination address of MOP message 
unre cethchiaaies autoservice on 


help type (x Caait. rcv, or full) 

assi . dress 

circuit & address. 

} Abad node name. 

circuit node hardware address. 

circuit assistant node address. 

circuit assistant node name. 

assistant node hardware 
address. 


service timer 


i Generate the Service Data Table entry count and the indices for each 


parameter. 


SVD_ INDEX GEN (PCNO, ~ 
SVD~INDEX-GEN (PCLI, 


GLOBAL LITERAL 
SVD$C_ENTRY_COUNT = SVD_INDEX; 


ZASSIGN (SVD_INDEX, 0) 
' 
Generate the Service Data Table. 
GLOBAL 

MOMSAB_SERVICE_DATA: parker vis 


I_SERVI 
PLITSERVI 


TOR C 
(SERVICE, 
RVICE- 


$c ENTRY -COUNT SVD$C pRNTRY _LENJ 
B TPC SERVICE BATA) 


8 (PELT Ped “SERVICE PATA; 


= 
oO 


TER: chon she MOMDAT .B32; °? 
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; ri 3 ! SBTTL "MOP Device Table’ 

3 rr <35 : : MOP device table symbol and macro definitions. 

: 46 re 1 MACRO 

3; 464 i tg 1 DEV (SYM, NAM) = 

; 64 Mm 044 1 SWITCHES *UNAMES 

> 66 M0444 1 PSECT OWN = MOMSMOPDEVNAMES; 

; 650 M0445 1 OWN 

: 451 » 46 1 STR : VECTOR CXCHARCOUNT (ZASCIC NAM). BYTE] 
s 6 § Mm 044 1 INITIAL (BYTE (ZASCIC NAM)) 

ey M0448 1 ALIGN (0); 

: 454 M0449 1 PSECT OWN = MOMSMOPDEVTABLE; 

; 455 m 0450 1 OWN 

; 4 $ te] 1 | IND : VECTOR CMDTSK_ENTRYLEN, BYTE) 

: 45 m 04 3 1 INITIAL (BYTE~(SYM), LONG (STR)) 
: 458 4 Bee 1 ALIGN (0); 

; 659 m 04564 #1 eee cL ane STR, IN ND; 

; 460 ™ 0455 1 SWITCHES NOU 

; 461 m 0456 1 ZASSIGN (MOPDEVENT, MOPDEVCNT + 1); 

; 46 m 0457 1 PSECT OWN = SOWNS; 

; 46 0458 1 q; 

; 466 #84 1! 

; rH res ' ; Initialize MOP device table and psects. 

; 467 bce 1 PSECT 

3; 468 463 1 GLOBAL = MOMSMOPDEVTABLE (NOWRITE, ALIGN (0)); 
; 469 0464 1 

; 470 0465 1 GLOBAL 

: 471 0466 1 MOMSAB_MOPDEVICES : BBLOCKVECTOR CO, MDTSK_ENTRYLEN); 
3 47 0468 1 PSECT 

: 4674 0469 1 GLOBAL = MOMSMOPDEVNAMES (NOWRITE, ALIGN (0)); 
3; 4675 0470 1 

3; 476 0471 1 GLOBAL 

: ere 04672 MOMSAB_MOPDEVNAMES : VECTOR CO, BYTE); 

: 479 474 1 PSECT 

; 480 0475 1 GLOBAL = $GLOBALS$; 

; 481 Be 78 1 

: 48 bc) 1 COMPILETIME 

5 re rf \, MOPDEVCNT = 0; 

: 485 0 1 ! This table contains the ASCII device name strings associated with a 
: ¢38 “ 1 : given MOP device code. 

; 688 ¢ 1 SMOPDEV (NMASC_SOFD_DMC, ‘DMC'); 

; 489 Re 1 SMOPDEV (NMASC_SOFD_UNA, ‘UNA‘); 

; $90 5 1 SMOPDEV (NMASC_SOFD_UNA, ‘QNA'); 

; 691 Bees 1 SMOPDEV (NMASC~ “SOF D- DUP, ‘DUP") 

: 49 4 1 SMOPDEV (NMASC-SOFD"DU, ‘'DU'); 

; 49 rt +3 1 SMOPDEV (NMASC_SOFD_DP, ‘DP'); 

> 494 1 SMOPDEV (NMASC"SOFD"DQ, DQ"); 

3; 495 490 1 SMOPDEV (NMASC_SOFD_DL, ‘DL"); 

3 $38 491 1 SMOPDEV (NMASC_SOFD_DA "DA') 

: 49 49¢ 1 SROPDEV (NMASC™SOFD-DTE, + TES: 

; 498 495 1 SMOPDEV (NMASC"~SOFD-KL "KL'); 


4 94 1 SMOPDEV (NMASC_SOFD_DMP, 'DMP'); 
95 1 SMOPDEV (NMASC-SOFD-DMV, ‘DMV'): 

SMOPDEV (NMASC-SOFD"DPV, 'DPV');: 

SMOPDEV (NMASC"SOFD"DMF. 'DMF'): 


GLOBAL LITERAL 
MDTSGK_MOPDEVCNT = MOPDEVCNT; 


LESFANLSS 


BISALANLSSSLF 


1 
1 
1 
1 
1 
1 
1 
1 
1} 
1 
1 
1 
1 
1 
1 
1 
0 


BOT 

i 1 inept 
318 2 unt ZQUOTE SMOPDEV;: 

14 509 END } 
515 340 End of module 
16 511 ELUDOM 


TITLE MOMDAT 
-IDENT \vV04-000\ 


-PSECT MOMSMOPDEVNAMES ,NOWRT ,NOEXE,0O 
00000 MOMSAB_MOPDEVNAMES: : 
-BLKB O 
43 4D 44 03 00000 dh 
41 4E 55 03 00004 ;STR 
U.3: eASCII <3>\UNA\ 
41 4E 51 03 00008 VetR 
U.5: «ASCII <3>\QNA\ 
50 55 44 03 0000C Vth 
0.7: ASCII <3>\DUP\ 
55 44 02 00010 ;STR 
ASCII <2>\DU\ 
50 44 02 00013 
eASCII <2>\DP\ 
51 44 02 00016 
eASCII <2>\DQ\ 
4C 44 02 00019 
eASCII <2>\DL\ 
41 44 02 OO0IC 
ASCII <2>\DA\ 
45 54 44 03 OOOTF satis diya 
‘ <3> 
4C 48 02 00023 
eASCII <2>\KL\ 
50 4D 44 03 00026 
ASCII <3>\DMP\ 
56 4D 44 03 OO002A 
eASCII <3>\DMV\ 
56 50 44 03 O002E 
eASCII <3>\DPV\ 
46 4D 44 03 00032 
ASCII <3>\DMF\ 


ASCII <3>\DMC\ 


F 9 
16-Sep-1984 02:01: VAX=-11 Bliss-32 V4.0-74 
vO6-000 MOP Device Table 10-30-1382 93 30h:80 DI SKSVMSMASTERS CMON, SRCIMOMDAT .832; 1" 


VAX=11 BL ise 


=32 V4.0- 
DISKSVMSMA Pose 15 


TER: (MOM. SRCIMOMDAT. 832;1 (6) 


v0 


yOe-000 MOP Device Table 1E-sen-1944 93:24 30 


«PSECT MOMSMOPDEVTABLE ,NOWRT ,NOEXE ,0 
00000 MOMSAB eet ae 


0¢ 00000 ;1ND ; 
00000000" Nei ADDRESS 0.1 
BY 00005 ; 140 
00000000" ADDRESS U.3 : 
4 9000 ie : 
.BYTE 1 

00000000" 00008 “ADDRESS U.5 
OA OOOOF ; IND : 

U.8: -BYTE 10 : 

00000009" 99010 SADDRESS U.7 : 
02 00014 ;IND : 

U.10: .BYTE 2 ; 

00000000" 90015 “ADDRESS U.9 ; 
00 00019 IND 

U.12: BYTE 0 

00000000" 0001A TADDRESS U.11 
06 OOO1E ;IND 

U.14: BYTE 6 ; 

00000000" 0001F SADDRESS U.13 ; 
04 00023 ; IND ; 
00000000" 00024" °* “ADDRESS ‘U.15 ; 
08 00098 ; IND : 

U.18: BYTE 8 

00000000" 99029 “ADDRESS U.17 
ee ied: BYTE 20 ; 
00000090" 90026 “ADDRESS U.19 ; 
20 00032 = IND : 

U.22: .BYTE 32 ; 

00000000" 0003 TADDRESS U.21 ; 
12 00037 ; IND ; 

U.24: .BYTE 18 : 

00000099" 900 “ADDRESS U.23 ; 
= ih. an 
000000 “ADDRESS U.25 : 
vee Kt i138: evte 36 ; 
00000000' 0004 “ADDRESS U.27 : 
26 00046 ; IND ; 

0.30: BYTE 38 ; 

00000000" 00047 ZADDRESS U.29 3 
.PSECT S$PLITS,NOWRT ,NOEXE ,2 : 

3A 54 45 GE SF “ASCII \_NET=\ ; 
LKB : 


ae P.AAB: 
P.AAA: LONG ; 
C “ADDRESS P.AAB : 


80000000" 


rc 
>. 


2 

AT 16- sep 1 VAX-11 BL iss -32 v4.0-7 4 
YOee000 MOP Device Table i2 -Sep- et 95: 9h: 38 DISKSVMSMASTER: (MOM. sre MOMDAT .832;1 ‘at ay 

SA 464 4G F 19 P.AAD: .ASCII \_ND:\ : 

68 8 14 P.AAC: .L 3 

“ 18 ADDRESS P. AAD g 

3A «C57 e 5 P.AAF: ASCI \NW:\ $ 

P.AAE: . s 

4 »ADDRESS P.AAF 3 

8 P.AAG: .LONG 197 : 

" ADDRESS BOMSAB_WICE_RCV_BUF 8 

P.AAH: .LONG 19 F 

? ADDRESS OQNSAS NICE WAIT BUF : 

‘ -ADDRESS MOMSAB_ACPQIO_BUFFER : 

0 40 P.AAJ: .LONG 3 

° 44 ADDRESS $AB_MOP_XM1T_BUF : 

000050C 00048 P.AAK: .LONG : 

0000000" 0004C «ADDRESS MOMSAB_MOP_RCV_BUF 3 


| 
| 
| 
} 
| 
| 
-PSECT S$GLOBAL$,NOEXE,2 
00090 MOM$GQ_ et eas 
00008 MOMSGW_ACP CHAN: : : 
00000000 0000C MOMSGL -LOGHASK: : " 
00010 MOMSGL -8V0 eek 5 
00014 MOM$GB -FUNCTION: : 
00015 MOMSGB_OPTION_BYTE:: 
BLKB 
| 


. 1 
0001 -BLKB 2 
0001 HORGAG J SE OLE 


-BL 
0003C MOMSGB_ENTITY_CODE:: 
-BLKB™ 1 


00030 -BLKB 3 
00040 MOMSAB_ ENTITY .BUE 


-B 
00000000 00060 momsca “ALONG -BUF DSC: 


00000000° 00064 DRESS MOMSAB_ENTITY_BUF ; 
0068 MOMSGL “SERVICE _FLAGS:: 


LK 
0006C MOMSGB_EVT POPR: : 
00060 MOMSGB EVI PRSN: 
0006E MOMSGB_EVT PSER:: 
ate 
$0090 0 MOMSGW_EVT CODE:: 
Sts 
$007 NOMSAB_NAL MAILEQX BUFFER: : 
0013C MOMSGL_NICE_RCV_MSG_LEN:: 


Poros: aeaeee meee eee 


33 


Fran 


AT 
Yoe-000 MOP Device Table 


FFFFFFFF 


00140 MOMSAB Nice grat *BUF 


80508 MOMSAB Jat g-bUgrgRE: 
00000000 00408 momsca ATIREOUT: —e 
00410 MOMSAB_ cib:: 76 


-BLKB 
0045C MOMSAB_LOOP CiB:: 6 


LKB 
004A8 MOMSAB_ MOP XMIT_B : 
OBCKB. 71300 
00A84 MOMSAB =O “nev ii 


01060 MOMSAB “nor OSG: 
BCkB “1500 


0163C MOMSGQ HOB MSG. od, BP 
01644 MOMSAB_MSGBLOCK:: 
BLKB 28 
02010012 01660 MOMSAB_SERVICE_DATA:: 
«LONG 33619986 
O1F6 01664 :WORD 0 
4 1998 -BYTE 1 
- 166 -BYTE 901302 
0201001 16E9 -LONG 619993 
0070 Q16ED WORD 112 
+ 16EF -BYTE 
O# 1$f0 -BYTE $1303 
O201001A 0177 - LONG . 94 
0071 0177 -WORD 11 
68 177 BYTE 0 
O# 0177 -BYTE 961302 
02010018 O17FB - LONG hte 
007d OI7FF WORD 12 
1801 -BYTE 0 
# 01802 -BYTE ? 130) 
02019015 1 «LONG 619996 
00 13 «WORD 135 
. 188A -BYTE 
# 01888 -BYTE 130) 
020199 1300 -LONG 619997 
1 i - WORD 6 
191 -BYTE 
1914 -BYTE §) 302 
020199 O1F 01996 «LONG 619999 
08D Q199A - WORD 4) 
1 0199C -BYTE 1 
ad 1990 -BYTE 130) 
oeceny 1AlF - LONG § 71 
1F4 QUA H - WORD 
1A -BYTE 
# 1A -BYTE 6130) 
0202 1A - LONG § 72 
6E O1AAC - WORD 1 


He WL yay: 


: (MOM. sae MOMDAT .B32;1 


Page 


Pee Se Se Se Se Se Se See Ge Se Se Se Se Se Se Se Se Se Se Be Be Se Se Be Se Se Be Se Se Se Se Se 


5 
“Sep-1 1 Bliss-32 V4.0-74 p 
MOP Device Table b- ~~ Bliss-32 v4.0 age 


BeF-19hG 15:46:30 DASKSVMGRASTERS MOM SRCSMOMDAT.832;1°°%° cos 
fe SRB : 
fie EBs 


0202 ibe 
0202 
020100 


020200 ; 
Oe 


0202004 
7 


DWWWOOWOOry,r 


“wT 

=o 

ee 

oo 

Nw 

oo 
cow 
wo 
wv 
~~ 
sf 


0202004 
007A 


02020056 


00 
0202 St 
mi 


a a a ts a ss a a ss a a a a a a a a 


NWN HMMM MMMMMoOS COC VII MOMOOOOOoow 


fet i 
“LONG 33279 
"WORD 
“BYTE 
“BYTE 0130) 
“LONG 
F "WORD 32768 
1 “BYTE 
é “BYTE 0130) 
1 “LONG 
118 “WORD 8192 
11A “BYTE 
118 “BYTE 0130) 
1 “LONG 
1A "WORD 16384 
1A “BYTE 
1 “BYT (130) 
; A “WORD 10 
C “BYTE 


poner -NETNAMDSC== P.AAA 
MOM$GQ-DLE_NAMDSC== P. AAC 
MOM$GQ-PSIRAMDSC== P.AAE 


k 9 
AT 16-Sep-1 :01: VAX-11 Bliss-32 V4.0-74 
oee000 MOP Device Table hae ats rR oe ES Td vo 
20 -BYT (130) : ; 
A LON : : 
o5 -WORD 56 ; : 
Bie 1393 ; : 
0101 : -LONG 1684 89 : : 
“BYT : ; 
0101 ye C ‘ort Io : 
88 $ ; ORD 1 " ; : 
Qe 028¢ BYTE 0 1303 : 3 
010190 44A -LONG 4 9, 3 : 
44 -WORD 1 : : 
# 0508 ‘BYTE p 1303 : ; 
010100 B 0240 “LONG 842795 ; : 
O9A 0240 “WORD 154 ; : 
2 " ry BIE 0¢1303 : 
00000 $3 “LONG : : 
00 "WORD 153 : : 
3 6 “BYTE : : 
O# 0256 “BYTE 0£130) : : 
000000 E “LONG : : 
0098 02569 “WORD = -'155 F : 
1 3EB "BYTE 1 ; : 
O# 025EC “BYTE 9C130] : ; 
0 66 LONG : F 
6 “WORD 4096 : ; 
be O5ce ‘BYTE 6C1303 : 3 
000099 0 re “LONG ; : 
si 6FB ~WORD 048 3 : 
# Ooere “BYTE 001303 ; 
000000 s 7 "LONG F : 
09C 7 «WORD 156 : : 
oe 097 ‘BYTE C1303 ; 
00000 09 ae : ; 
04 OD "WORD 1024 : F 
6 ‘BYTE 001303 ; 
900000 9 “LONG : ; 
“WORD 512 : : 
35 BYTE 130 : 
050100 1B Bene 84989037 : ; 
91F “WORD 1120 : ; 
321 “BYTE 1 : 3 
922 “BLKB 130 : 


AT 1b-5e -1 :01: VAX-11 Bliss-32 V4.0- 18 
Woe 000 MOP Device Table 300-138 95:01:98 DISKSVMSMASTER: (MOM. SRCSMOMDAT.832:1° 31 a (6) 
MOMSK_NML_MBX_BUF =LENAS 
MOMSAB_NCP VERS1ON==MOMSAB_ NML_MAILBOX_BUFFER 


MOMSAB_NICE_RCV_BUF= 
MOMSAB_ NML _MAILBOX_BUF FER+3 
MOMS$GQ_NICE_RCV_BUF _DSC== 


6 
MOMSGQ_NICE_XMIT_BUF_DSC== 
MOM$GQ_ACPQ10_BUF _DSC== 


-AAI 
MOMSAB_TRIGGER CJBE=RORSAB_ LOOP_CIB 
MOMSGQ"MOP_XMIT_BUF _DSC== 


-AA 
MOMSGQ_MOP_RCV_BUF Dsies 
NMASC_PCNO_SHNA== 


SS 


K 
SVD$SGK-PCNO- LNAss 
SVD$GK~PCNO-SLNH= 
SVD$GK-PCNO_LAN== 


< 
— 
on 
a 
x 
a 
wv 
z 
fi 
r 
oO 
> 
" 
" 


RM OODNAMNE WN OODNOUSWN Oo 


M 
16-Sep-1 


YOee000 MOP Device Table 16-sep-1984 93:8 
SVD$GK_PCNO_ 
SVD$SGK_ “pet 


nee 
; Compilation Complete 


PSECT SUMMARY 
Name Bytes Attributes 
SGLOBALS 10660 NOVEC, WRT, RD ,NOEXE,NOSHR, 
SPLITS 8 NOVEC,NOWRT, RD ,NOEXE,NOSHR, 
MOMSMOPDE VTABLE NOVEC,NOWRT, RD ,NOEXE,NOSHR, 
MOMSMOPDE VNAME S 54 VEC,NOWRT, RD ,NOEXE,NOSHR, 
- ABS . 0 NOVEC,NOWRT,NORD ,NOEXE,NOSHR, 


Library Statistics 
socenee= Symbols -------- 


File Total Loaded Percent 
3 $5$0u OBJ JMOML IB. “133i 1 194 19 9 
“$ 3$DUA ESMRLSB SRMMAL IGRY L32;1 87 42 4 
"$255$DUA28: CSHRLI 1279 24 1 
$255$DUA ESystie STARLET .L32;1 9776 0 0 


COMMAND QUALIFIERS 


BLISS/CHECK=(FIELD, INITIAL,OPTIMIZE)/LIS=LIS$:MOMDAT/OBJ=OBJ$:MOMDAT MSRC$:MOMDAT/UPDATE=(ENHS$:MOMDAT) 


517 512 0 


id “86: 
clrseed. Time: : 


1 

3 

Lines/CPU Min: 164 
potty Bay ie 4019 
Used: 120 pag 


0869 data bytes 


Pages 


:30 
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a 


Vv 
D 
3 


AX- 
ISK 


11 Bliss 
SVMSMAST 


ER: CMON SRC MOMDAT .832; 1 _ 


023 -BT13A-SE DIGITAL EQUIPMENT CORPORA 
VAX/VMS V4.0 ? CONFIDENTIAL -AND PROPRIET 


TION 
ARY 


